SystemVision IMMEDIATE ACTION BULLETIN PTF W3063968
---------------------------------------------------
DATE: 2004/04/27
PRODUCT: SystemVision
RELEASE: C306M1C
PREREQUISITES: PTF 3966
COREQUISITES: None
SUPERSEDES: None
SUBJECT: Correction of PARENT processing in IMPACT product
DESCRIPTION:
1. If the data field in COBOL program is redefined a few times and any
of the redefined fields have different length than the original one,
in PARENTS report (***IDNL) original field appears with the length
of redefined fields.
2. If some parts of data description are located in the body of the
main program and other parts in the copybook (different member),
PARENTS report loses parent data names located in the main program.
3. Impacted data names file (***0IDNL) and PARENTS file (***IDNL) don't
have level number before data names.
SOLUTION: PTF W3063968 has been written to correct this problem. This
correction is applicable to all users running the SystemVision release
C306M1C tape created before 2004/04/27.
PTF W3063968 should be applied to the SystemVision LOADLIB after
installation has been completed.
PTF W3063968:
* C306M1C
NAME PM@ATT PM@ATT 2004/04/27 C306M1C WO=3968 I0008229
IDRDATA W3063968
VER 034070 F0F9,61F1,F361,F0F2 VERIFY DATE
VER 03407C 0085,216F VERIFY TIME
VER 000958 4040,4040,4040,4040
VER 000960 4040,4040
VER 000964 4040,4040
VER 000968 4040,4040
VER 00096C 4040,4040,4040
VER 000972 4040,4040
VER 000976 4040
VER 000978 4040,4040,4040
VER 00097E 4040,4040
VER 000982 4040,4040,4040
VER 000988 4040,4040,4040
VER 00098E 4040,4040
VER 000992 4040
VER 000994 4040,4040,4040
VER 00099A 4040,4040
VER 00099E 4040,4040,4040
VER 0009A4 4040,4040,4040
VER 0009AA 4040,4040,4040
VER 0009B0 4040
VER 0009B2 4040,4040,4040
VER 0009B8 4040,4040,4040
VER 0009BE 4040
VER 0009C0 4040,4040,4040
VER 0009C6 4040,4040
VER 0009CA 4040,4040,4040
VER 02DD04 95C4,8BC9
VER 02E756 9540,78C6
VER 02EB10 FA20,86E8,418B
VER 032E2E 4770,528E
VER 03329C D501,7054,4274
CHECKSUM 12D7E1C7
REP 000958 4040,4040,4040,4040
REP 000960 4040,4040
REP 000964 95F7,78AF
REP 000968 4770,7972
REP 00096C D203,78EB,71BE
REP 000972 95C4,8BC9
REP 000976 07FE
REP 000978 D503,71BE,7960
REP 00097E 4780,798E
REP 000982 960F,71C1,0707
REP 000988 F343,78A9,71BE
REP 00098E 9540,78C6
REP 000992 07FE
REP 000994 D503,71BE,7960
REP 00099A 4780,79AA
REP 00099E 960F,71C1,0707
REP 0009A4 F343,769F,71BE
REP 0009AA FA20,86E8,418B
REP 0009B0 07FE
REP 0009B2 D207,7958,704C
REP 0009B8 D501,7054,4274
REP 0009BE 07FE
REP 0009C0 D507,704C,7958
REP 0009C6 4770,528E
REP 0009CA 47F0,527A
REP 02DD04 4DE0,7964
REP 02E756 4DE0,7978
REP 02EB10 4DE0,7994,0707
REP 032E2E 4770,79C0
REP 03329C 4DE0,79B2,0707
CHECKSUM 81BAB25F
* C306M1C
NAME PM@DAT PM@DAT 2004/04/27 C306M1C WO=3968 I0008229
IDRDATA W3063968
VER 049E08 F0F9,61F1,F361,F0F2 VERIFY DATE
VER 049E14 0085,231F VERIFY TIME
VER 0006E8 4040,4040,4040
VER 0006EE 4040,4040,4040
VER 0006F4 4040
VER 0006F6 4040,4040,4040
VER 0006FC 4040,4040
VER 000700 4040
VER 03A88E D205,7527,7B68
VER 047102 5820,D068
CHECKSUM C5923A2F
REP 0006E8 D203,759E,7C58
REP 0006EE D205,7527,7B68
REP 0006F4 07FE
REP 0006F6 D203,7C58,81F1
REP 0006FC 5820,D068
REP 000700 07FE
REP 03A88E 4DE0,76E8,0707
REP 047102 4DE0,76F6
CHECKSUM 811D1FFF
* C306M1C
NAME PM@LIS PM@LIS 2004/04/27 C306M1C WO=3968 I0008229
IDRDATA W3063968
VER 0B3AD8 F0F9,61F1,F361,F0F2 VERIFY DATE
VER 0B3AE4 0085,254F VERIFY TIME
VER 0B0894 5820,D068
VER 0B0898 95F1,2056
VER 0B089C 4770,56F4,D204
VER 0B08A2 7DE0,9660
VER 0B08A6 D200,7DE5
VER 0B08AA 791F,D200
VER 0B08AE 7DE6,795F
CHECKSUM 4A0F38D1
REP 0B0894 95F7,791F
REP 0B0898 4770,56C2
REP 0B089C D203,75D6,795B
REP 0B08A2 5820,D068
REP 0B08A6 95F1,2056
REP 0B08AA 4770,56F4
REP 0B08AE 0707,0707
CHECKSUM 0452CD85
---------------------------------------------------------------------
PTF C306.3968B should be applied to the SystemVision PMPRMLIB after
installation has been completed.
PTF C306.3968B should be applied by making the following changes to the
member SVIMP@ in your &PREFIX.&vers.PMPRMLIB library.
Was:
IMPINIA3 @SV UCODE=(29, )
Change to:
IMPINIA3 *SV UCODE=(29, )
Was:
IMPINIP2 @SV SORT=(MEMBER,DNAME),DUP=DROP,DLOC=79
Change to:
IMPINIP2 @SV SORT=(MEMBER,IDENT,DNAME),DUP=DROP,DLOC=79
Was:
IMPINIP5 @SV ERROR=GO
Change to:
IMPINIP5 @SV ERROR=GO,LLOC=NO
Was:
IMPINIP6 @SV ERROR=GO
Change to:
IMPINIP6 @SV ERROR=GO,LLOC=NO
Was:
IMPINIBA @SV SORT=(IDENT,DNAME,2,7),DUP=DROP
IMPINIBA @SV UCODE=(29, )
Change to:
IMPINIBA @SV SORT=(IDENT,XREF,DNAME),DUP=DROP
IMPINIBA *SV UCODE=(29, )
Was:
@PRODUCT 06219972 27260036
Change to:
@PRODUCT 06225959 27655360